#!/usr/bin/perl

=pod    

set path=D:\Perl\bin;d:\Perl\site\bin;%path%
set PERL5LIB=D:\Perl\bin;D:\Perl\site\lib;D:\Perl\lib

=cut

use FindBin qw($Bin);
push (@INC,"$Bin");

#-------------
use Wx;

require  'wxperl_glade.pl';


#-------------
	my $local = Wx::Locale->new("English", "en", "en"); # replace with ??
	$local->AddCatalog("plapp"); # replace with the appropriate catalog name

	my $plapp = wxperl_glade->new();
	$plapp->MainLoop();









